home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / CPUs / Macintosh Solutions Demo / Macintosh Solutions 1.0 / card_11082.txt < prev    next >
Text File  |  1990-08-24  |  5KB  |  196 lines
  1. -- card: 11082 from stack: in.0
  2. -- bmap block id: 8342
  3. -- flags: 4000
  4. -- background id: 4734
  5. -- name: USAS1.3
  6.  
  7.  
  8. -- part 11 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=325 top=93 right=115 bottom=489
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Which Macintosh?…
  20. ----- HyperTalk script -----
  21.  
  22. on mouseUp -- School Administration
  23.   determineSoftware -- bg script
  24.   put char 4 of short name of this card into whichCategory
  25.   if the hilight of btn 8 = true then
  26.     goSolution whichCategory,3.3
  27.     exit mouseUp
  28.   end if
  29.   if the hilight of btn 7 = true then
  30.     goSolution whichCategory,3.2
  31.     exit mouseUp
  32.   end if
  33.   repeat with i = 2 to 6
  34.     set cursor to busy
  35.     if the hilight of cd btn i = true then
  36.       goSolution whichCategory,3.1
  37.       exit mouseUp
  38.     end if
  39.   end repeat
  40.   answer "Please select at least one software category."
  41. end mouseUp
  42.  
  43.  
  44.  
  45.  
  46. -- part 3 (button)
  47. -- low flags: 00
  48. -- high flags: A005
  49. -- rect: left=79 top=264 right=285 bottom=213
  50. -- title width / last selected line: 0
  51. -- icon id / first selected line: 0 / 0
  52. -- text alignment: 1
  53. -- font id: 0
  54. -- text size: 12
  55. -- style flags: 0
  56. -- line height: 16
  57. -- part name: Word Processing
  58. ----- HyperTalk script -----
  59. on mouseUp
  60.   if the hilight of me is true then putMeInList (short name of me)
  61.   else getMeOutOfList (short name of me)
  62. end mouseUp
  63.  
  64.  
  65.  
  66. -- part 4 (button)
  67. -- low flags: 00
  68. -- high flags: A005
  69. -- rect: left=79 top=224 right=245 bottom=213
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 0 / 0
  72. -- text alignment: 1
  73. -- font id: 0
  74. -- text size: 12
  75. -- style flags: 0
  76. -- line height: 16
  77. -- part name: Spreadsheets
  78. ----- HyperTalk script -----
  79. on mouseUp
  80.   if the hilight of me is true then putMeInList (short name of me)
  81.   else getMeOutOfList (short name of me)
  82. end mouseUp
  83.  
  84.  
  85.  
  86. -- part 5 (button)
  87. -- low flags: 00
  88. -- high flags: A005
  89. -- rect: left=79 top=164 right=185 bottom=213
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 0 / 0
  92. -- text alignment: 1
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: Database
  98. ----- HyperTalk script -----
  99. on mouseUp
  100.   if the hilight of me is true then putMeInList (short name of me)
  101.   else getMeOutOfList (short name of me)
  102. end mouseUp
  103.  
  104.  
  105.  
  106. -- part 6 (button)
  107. -- low flags: 00
  108. -- high flags: A005
  109. -- rect: left=79 top=184 right=205 bottom=213
  110. -- title width / last selected line: 0
  111. -- icon id / first selected line: 0 / 0
  112. -- text alignment: 1
  113. -- font id: 0
  114. -- text size: 12
  115. -- style flags: 0
  116. -- line height: 16
  117. -- part name: E-Mail
  118. ----- HyperTalk script -----
  119. on mouseUp
  120.   if the hilight of me is true then putMeInList (short name of me)
  121.   else getMeOutOfList (short name of me)
  122. end mouseUp
  123.  
  124.  
  125.  
  126. -- part 7 (button)
  127. -- low flags: 00
  128. -- high flags: A005
  129. -- rect: left=79 top=144 right=165 bottom=253
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 1
  133. -- font id: 0
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: Data Entry & Retrieval
  138. ----- HyperTalk script -----
  139. on mouseUp
  140.   if the hilight of me is true then putMeInList (short name of me)
  141.   else getMeOutOfList (short name of me)
  142. end mouseUp
  143.  
  144.  
  145.  
  146. -- part 8 (button)
  147. -- low flags: 00
  148. -- high flags: A005
  149. -- rect: left=79 top=244 right=265 bottom=248
  150. -- title width / last selected line: 0
  151. -- icon id / first selected line: 0 / 0
  152. -- text alignment: 1
  153. -- font id: 0
  154. -- text size: 12
  155. -- style flags: 0
  156. -- line height: 16
  157. -- part name: Student Management
  158. ----- HyperTalk script -----
  159. on mouseUp
  160.   if the hilight of me is true then putMeInList (short name of me)
  161.   else getMeOutOfList (short name of me)
  162. end mouseUp
  163.  
  164.  
  165.  
  166. -- part 10 (button)
  167. -- low flags: 00
  168. -- high flags: A005
  169. -- rect: left=79 top=204 right=225 bottom=183
  170. -- title width / last selected line: 0
  171. -- icon id / first selected line: 0 / 0
  172. -- text alignment: 1
  173. -- font id: 0
  174. -- text size: 12
  175. -- style flags: 0
  176. -- line height: 16
  177. -- part name: File Server
  178. ----- HyperTalk script -----
  179. on mouseUp
  180.   if the hilight of me is true then putMeInList (short name of me)
  181.   else getMeOutOfList (short name of me)
  182. end mouseUp
  183.  
  184.  
  185.  
  186. -- part contents for background part 1
  187. ----- text -----
  188. USAS1.3
  189.  
  190. -- part contents for background part 3
  191. ----- text -----
  192. 28
  193.  
  194. -- part contents for background part 7
  195. ----- text -----
  196. Click to select the software categories that interest you, then click the ‚ÄúWhich Macintosh?‚Ķ‚Äù button to see the recommended Macintosh.